home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 March / CHIP Mart 1997.iso / SurfCam / SURFCAM.Z / FADAL.M3 < prev    next >
Text File  |  1996-04-01  |  4KB  |  142 lines
  1. name Fadal Format 1
  2.  
  3. % 00
  4. / 00
  5. O >4
  6. L >4
  7. N >4
  8. G >2
  9. S >4
  10. H >2
  11. D >2
  12. M >2
  13. T >2
  14. R ->3.>4
  15. z ->3.>4 Z
  16. E >2
  17. X ->3.>4
  18. Y ->3.>4
  19. Z ->3.>4
  20. I ->3.>4
  21. J ->3.>4
  22. K ->3.>4
  23. F >4.>2
  24. Q ->3.>4
  25. P ->3.>4
  26. ( 00
  27. d >3.>4
  28. e >3.>4
  29. f >3.>4
  30.  
  31. ModalLetters X Y Z F                  # List of letters that are modal
  32.  
  33. ModalGs 0 1 2 3 73 74 76 80 81 82 83 84 85  # List of g codes that are modal
  34.  
  35. Sequence#s N 0 1 1                    # Char, freq, incr & start
  36. First#? N                             # Y or N  'Output 1st sequence no.
  37. Last#? N                              # Y or N  'Output last sequence no.
  38.  
  39. HCode X                               # X or X U  'Horizontal char.
  40. VCode Y                               # Y or Y V  'Vertical char.
  41. Dcode Z                               # Depth char.
  42. FeedCode F                            # Feed rate char.
  43.  
  44. Comment ( )                           # Begin End comment char.
  45.  
  46. Spindle 3 4 5                         # Cw, ccw & stop m codes
  47. Coolant 8 9 7                         # On, Off & Mist m codes
  48. DComp 41 42 40                        # Left, Right & Cancel m codes
  49. LComp 43 49                           # On & Off codes
  50.  
  51. Feed G1                               # Linear move
  52. Rapid G0                              # Rapid positioning word
  53. Cw G2                                 # Circular move clockwise
  54. Ccw G3                                # Circular move counter clockwise
  55. Inc/Abs G 91 90                       # Inc & Abs char. & values
  56. CtrCode I J                           # I J or R or I J K L
  57. Helical? Y
  58.  
  59. Spaces? Y                             # Y or N  'Spaces between words
  60.  
  61. Incremental? N                        # Y or N  'Inc or abs output
  62. CtrIncremental? Y                     # Y or N  'Inc or abs I & J
  63. ByQuadrants? N                        # Y or N  'Break arcs at quadrants
  64.  
  65. UppercaseComments? Y                  # Y or N 'Require uppercase comments
  66.  
  67. WorkDefault 1                         # Work offset register default
  68.  
  69. Drill                                 # Drilling canned/manual cycle
  70. G81 G99 R[Vclear] z[D] F[FRate] X[H] Y[V]
  71. end cancel
  72.  
  73. Peck                                  # Pecking canned/manual cycle
  74. G83 G99 R[Vclear] z[D] F[FRate] Q[VBite] X[H] Y[V]
  75. end cancel
  76.  
  77. LTap                                  # Left handed tapping cycle
  78. G74 G99 R[Vclear] z[D] F[Frate] Q[VBite] X[H] Y[V]
  79. end cancel
  80.  
  81. Tap                                   # Tapping canned/manual cycle
  82. G84 G99 R[Vclear] z[D] F[Frate] Q[VBite] X[H] Y[V]
  83. end cancel
  84.  
  85. Ream                                  # Reaming canned/manual cycle
  86. G85 G99 R[Vclear] z[D] F[FRate] X[H] Y[V]
  87. end cancel
  88.  
  89. Bore                                  # Boring canned/manual cycle
  90. G86 G99 R[Vclear] z[D] F[FRate] X[H] Y[V]
  91. end cancel
  92.  
  93. Back                                  # Back boring canned/manual cycle
  94. G76 G99 R[Vclear] z[D] F[FRate] Q[Sclear] X[H] Y[V]
  95. end cancel
  96.  
  97. Cancel                                # Cancel a canned/manual cycle
  98. G80
  99. end
  100.  
  101. StartCode                             # Start of the program
  102. %0
  103. O[Program#]
  104. End
  105.  
  106. 1stToolChange                         # First tool change
  107. M6 T[Tool] (0 d[ToolRad] e[ToolDiam] f[corner]
  108. G0 G90 S[Speed] M[Direct] E[Work] X[H] Y[V]
  109. H[Lcomp] M[Cool] Z[D]
  110. End
  111.  
  112. Infeed                                # Enable cutter comp
  113. G1 G[Side] X[H] Y[V] F[FRate]
  114. end
  115.  
  116. Outfeed                               # Disable cutter comp
  117. G40 X[H] Y[V]
  118. Z[D]
  119. end
  120.  
  121. ToolChange                            # Secondary tool changes
  122. M5 M9
  123. G0 G49 G90 Z0
  124. M6 T[Tool] (0 d[ToolRad] e[ToolDiam] f[corner]
  125. G0 G90 S[Speed] M[Direct] E[Work] X[H] Y[V]
  126. H[Lcomp] M[Cool] Z[D]
  127. End
  128.  
  129. EndCode                               # End of the program
  130. M5 M9
  131. G0 G49 G90 Z0
  132. E0 X0 Y0
  133. M6 T[Tool1]
  134. M2
  135. %0
  136. End
  137.  
  138. replace "d" with "Tool Radius: "
  139. replace "e" with "Diam: "
  140. replace "f" with "Corner Rad.: "
  141.  
  142.